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PREFACE 


Section I of this publication introduces the dataBASIC Load/Unload System and the 
five phases composing it. Section II explains the system's input cards, their preparation, 
and appearance in card deck setups. Section III describes the program runs in terms of 
required input, type of processing, and output. Section IV briefly describes output re- 
ports and presents samples of the reports. Appendix A lists DBINIT field names and 
descriptions; Appendix B lists error messages; and Appendix C compiles sample tape 


formats. 


Within the text of this manual, all references to Series 6000 systems are applicable 


to Series 600 systems unless stated otherwise. 


Other Honeywell publications concerning the dataBASIC System include: 


e Control Cards, Document Number CPB-1688 

® Integrated Data Store (I-D-S), Document Number CPB-1565 

e dataBASIC Language Manual, Order Number DA08 

e dataBASIC System Field Support Guide, Order Number DA2Z5 

e Comprehensive Operating Supervisor, Document Number CPB-1518 
e File and Record Control, Document Number CPB-1003G 


(c) 1971, Honeywell Information Systems Inc. 
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SECTION I 


INTRODUCTION TO THE dataBASIC SYSTEM 


Honeywell's dataBASIC Load/Unload System is a highly efficient computerized 
system designed to load a standard file into a dataBASIC file, to unload and reload an 
established dataBASIC file, or to perform these operations simultaneously to merge 


additional data into an already existing dataBASIC file. 


HARDWARE REQUIREMENTS 
The dataBASIC Load/Unload System can operate on any Series 6000 processor with 


the following hardware requirements: 


e 64k of memory 

e Any type of mass storage (except H-204) 
e Five % - inchtape units 

e A card reader 


uf 
e DATANET 30 for Time Sharing (optional) 
This low-cost initial investment in a computer system provides a user with all the 


advantages of tape processing and high-speed computer efficiency. 


SYSTEM DESIGN 

The dataBASIC Load/Unload System provides all the calculations, processing, and 
reports common to many computerized procedures. It may be considered to comprise 
five separate phases: 

i. File Initialization (Phase I) 

2 File Unload (Phase II) 

3 File Merge (Phase III) 

4. File Load (Phase IV) 

5 File Creation and Transfer (Phase V) 


Trademark 
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Figure 1-1. dataBASIC Load/Unload System Flow 
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File Initializing (Phase ]) 


Phase I is used to convert a standard file into input acceptable to the load pro- 
cedures; it is run only when initializing a new file or when merging data into an existing 


file. 


Phase I consists of the Honeywell DBINIT program. It accepts as input the standard 
file to be converted into a dataBASIC file and the control cards to direct this conversion. 
It generates as output an optional listing of the converted data and the file designated as 
New Triplets (NT). (A Triplet is defined as an entity or record identifier, field name, 
and field value.) This file is applied as input to the DBSRTB program in Phase III and to 
the DBLODB program in Phase IV. 


CONTROL 
CARDS 
I* 


OLD 
STANDARD 


FILE 
(IN) 
DBINIT 
OLD CARD 


FILE 
IN 


Figure 1-2. Phase I - File Initialization Block Diagram 
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Figure 1-3. 
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Phase II - File Unload Block Diagram 
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File Unload (Phase II) 

Phase II is used to unload an established dataBASIC file and to convert it to input 
acceptable to the load procedures. It is run only when unloading and reloading an 
established dataBASIC file or when merging additional data into an existing file. (It can 
also be used to go from a dataBASIC file back to a standard file; from this point, however, 


unique programming would be required to develop the desired file. ) 


Phase II has four programs -- DBUNLD, DBSRTA, DBTRIP, and DBSRTD. 


The DBUNLD program converts the established dataBASIC file into a standard file, 


each dataBASIC record becoming one record with special sorting keys attached. 


The records resulting from the DBUNLD conversion are sorted by the DBSRTA 


program. 


The DBTRIP program builds the sorted records of DBSRTA into Triplets, and also 
outputs a file with data which cannot be formatted into Triplets. (This file serves as 


input to DBLODA in Phase III and to DBLODB in Phase IV.) 
The DBSRTD program sorts the Triplets built in DBTRIP and outputs a file called 


Old Triplets (OT), which serves as input to DBSRTB in Phase III and to DBLODB in 
Phase IV. 
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Phase III - File Merge Block Diagram 
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File Merge (Phase III) 
Phase III is used to merge and sort NEW and/ or OLD Triplets. From the total number 


of Triplets and other data base records which were not formatted into Triplets, Phase III 


computes the new data base size. 


Two programs are included in Phase III -- DSRTB and DBLODA. The DSRTB program 
accepts one user-prepared control card for the 1* file which must be prepared according to the 
format shown in Figure 2-1, Section II, of this Implementation Guide. All fields other than 
these shown in Figure 2-1 are ignored. From the control card, the program decides which 


files or Triplets to process and release to sort. 


In a post-sort procedure, various totals are compiled and placed on Control file A (CA). 
The sorted Triplets, called All Triplets (AT), are output and serve as input to DBLODB in 
Phase IV. 


The DBLODA program accepts as input Control file A from DBSRTB, as well as other 
data base records from DBTRIP, and computes the new data base size for job stack cards to 
be used in Phase IV. It also outputs Control file B (CB) to be used as input to DBLODB in 
Phase IV. 


After Phase III, the job must terminate because the data base size is needed for 


allocation, creation, and initialization at the start of Phase IV. 
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File Load (Phase IV) 
Phase IV is used to load the new data base; it includes three programs -- DBLODB, 
DBSRTC, and DBLODC. 


The temporary I-D-S data base (Al) is first initialized with the I-D-S Utility 
QUTU. 


The DBLODB program accepts as input the Control file B (CB), other Data Base 
records (DB), Old Triplets (OT), New Triplets (NT), All Triplets (AT), and a temporary 
initialized I-D-S data base (Al). DBLODB stores all required records in the data base, 
but for efficiency it does not link all the chains; instead, it outputs a file-Value-occur- 


Reference file (VR) which contains direct references for the completion of the chains. 


The DBSRTC program sorts these direct-references. 


The BDLODC program completes the loading of the data base by completing these 


chains. 


The temporary I-D-S data base (Al) is finally dumped to the Dump Tape (DT) file 
with the I-D-S Utility QUTU. 
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File Creation and Transfer (Phase V) 


Phase V is used to create a permanent dataBASIC file and Retreat file and then 


transfer the new data base (which was dumped from a temporary file to tape in Phase IV) 


to the permanent dataBASIC file. 


Phase V has two parts; the first part of Phase V includes the performance of three 


system actions: 


io A subcatalog with no permissions must be created under the user ID given 


on a single control card submitted in Phase II]. (This catalog must not be 


created on the DSU2Z00. ) 


ee A data file subordinate to the above subcatalog must be created having the 


following attributes: 


@ Name of .DATAO. 
e Size in links must be equal to the number of links specified in Phase III. 
e Device must not be on a DSUZ00. 
® Mode must be random. 
e No permissions. 
2 A retreat file subordinate to the above subcatalog must be created having the 


following attributes; 


Name of .JOUR. 
Size in links is computed from the following formula: 
Let R= link size of retreat file. 
Let D= link size of data file. 
for D s 5, R=D 


= Dd 
for D>5, R 5 +7 
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e Device must not be on a DSUZ200. 
e Mode must be random. 


e No permissions. 


The second part of Phase V consists of the transference of the file contents from 


the tape saved in Phase III to the permanent file, .DATAO, created in item 2 above. 


0 
ae (Dump tape from 
Phase IV) 


(PASS 1) (PASS 2) 


CREATE I-p-s QUTU 
dataBASIC LOAD dataBASIC 
FILE DATA BASE FILE 


Figure 1-6. Phase V - File Creation and Transfer Block Diagram 
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Figure 1-7. dataBASIC File Structure Diagram 
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SECTION II 


INPUT CONTROL CARDS 


This section of the Implementation Guide specifies all the cards needed in the 
dataBASIC Load/Unload System. The cards are of threetypes, designated as $, I-D-S, 
or L/UNL. Cards designated as $ are the standard GECOS type card described in 
Series 6000 Control Cards, Document Number CPB-1688; the I-D-S type card is 
described in Series 6000 Integrated Data Store (I-D-S), Document Number CPB-1565. 
Cards designated as L/UNL are particularized for the dataBASIC Load/Unload System; 
they include the single L/UNL card used in the DBSRTB program of Phase III and the 
L/UNL cards used in the DBINIT program of Phase I. 


dataBASIC L/UNL CONTROL CARDS 


Phase III L/UNL Control Card 

The function of the L/UNL control card used in Phase III is to create Old Triplets 
and/or New Triplets. It is accepted as input by the DBSRTB program which edits it, 
saves it and writes it on the I* file. This L/UNL card must be prepared according to 


the format shown in Figure 2-l. 


Card Columns Card Entry 


1-3 The new indicator. If new data from Phase I exists, 
enter NEW; otherwise leave blank. 


The old indicator. If old data from Phase II exists, 
enter OLD; otherwise leave blank. 


Percentage of growth. Enter the percentage of file 
space to be allocated beyond that required. This 
field cannot be blank. 


The user identification. Enter the l2-character user- 
identification to be retained in the file. If only doing 
NEW, this field cannot be blank, If doing OLD, any 
entry in this field will replace the OLD USER-ID. 


(All other fields in this card are ignored.) 


Figure 2-1. Phase III L/UNL Card Format 
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Phase I L/UNL (DBINIT) Control Cards 


FUNCTIONS 


The L/UNL control cards used in Phase I have many functions; through the processing 


of these cards, the DBINIT program will: 


1 Process presequenced input data in the forms of punched cards or a file 
which either conforms to the system format or contains a control block 


modifiable with an FFILE card. (See Series 6000 Comprehensive Operating 
Supervisor, Document Number CPB-1518.) 


Ze Recognize up to 26 different input records of variable size; individual records 
should be of the same fixed size. 


3. Develop up to 200 fields of data. Each field may be edited for alphabetic or 
numeric coding, blank or zero, a specific value, or a given range; each 
alphanumeric field may have selected input characters converted to a 
different output value. 


4. Develop up to nine different output records; up to ten comparison criteria 
may be applied to each output record. 


on Allow a limited test prior to a full run. 
6 Print, on user option, all generated data. 
7. Develop and display input and output control totals. 


GENERAL CONSIDERATIONS 

Some general considerations apply in the preparation of all DBINIT control cards. 
For example, tests should be run, and output from the tests should be verified until 
satisfactory results are being obtained from the control cards. There will be no other 


data displays. 
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Key punch guides, which should be reproduced and used in the preparation of 
DBINIT control cards, are shown in Figures 2-12, 2-13, and 2-14 at the end of this 


section. 


All references to data are accomplished through character position; the first 
character ina record is 1; itis not zero, With one exception, all alphanumeric field 


names and values are entered left justified with leading blanks or zeros. 


All control cards must contain proper identification in columns 1-4; for cards 


requiring a suffix, column 4 must be A through Z. 


Control cards may be input in any sequence, except that the ENDEND card must be 
the last card. The program, however, performs an internal sort of the control cards 
and will speed up the running if the cards, with the exception of ENDEND, are submitted 


in groups according to type and in alphabetic sequence by suffix. 


The first phase of the program edits all the control cards and lists them in the order 
of input. Detected errors are immediately displayed following the card display. (See 


Appendix B for these error messages, and Figure 4-1 for sample control card listings. ) 
Character conversion, if requested, occurs first so that comparisons would be to 


its converted value. Field conversion, if requested, occurs last so that comparisons 


would still be the input character-converted value. 
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TEST CARD 

The test option is initiated by submitting the TEST card. Enter in columns 5 
through 8 the number of records to be read. The program will terminate, as if it had an 
end-of-file card, after performing the required number of reads. The test option will 
automatically list the output data. If the TEST card is not included, the program will 
process input until an end of file is reached. (See Figure 2-12, DBINIT Record Definition 
and Selection Card Key Punch Guide.) 


CONV CARD 

The character conversion option is initiated by submitting the CONV card; up to 
38 characters may be converted. The CONV card consists of 38 pairs beginning in 
column 5. Enter in the left position the character to be converted, and in the right 


position enter the character to which it is to be converted. (See Figure 2-12.) 


REC (SUFFIX) CARDS 

The various input records are described through the submission of REC (Suffix) 
cards. The RECA card is required; all other REC cards are optional and dependent on 
data. Three types of data can be described on the RECA card: 


l. All identical fixed length data records. Enter a 1 in column 6; no 
other entry through column 20 is required, nor are additional 
REC cards necessary. 


2% A fixed number of logical records, arranged in sequence, composes 
one data record. Enter the number of logical records in columns 5 
through 8; no other entry through column 20 is required. 


An REC card must be submitted for each number; use suffixes 
sequentially starting with A. 


3. A variable number of logical records, arranged in sequence, composes 
one data record. 


For this type data, each logical record must contain an identifier in the 
same relative location. The identifier must be six characters or less 
and must be consistent for each type record throughout the file. 


On the REC card, enter the FROM and TO character positions of the 
identifier. Enter the literal, right justified, in column 20, which 
identifies this record. Continue with one REC card for each type 
record entering its identifying literal. 
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Each REC card must have an action entered which must be IGNORE, RETAIN, or 
OUTPUT. If itis IGNORE, the record when encountered will be bypassed and the next 
record retained. If itis RETAIN, the data fields to be abstracted from this record will 
be obtained and retained in memory and the next input record obtained. If itis OUTPUT, 
the records to be output, as described in the RECORDS OUT columns, are the output. 
At least one REC card must contain an action of OUTPUT. 


Up to nine records may be output; they are identified by numbers 1 through 9. 
Enter the desired output record identifiers in columns 27-35. The fields constituting an 


output record are identified by the same number. 


FLD CARDS 
The data fields to be developed are described by submitting FLD (suffix) cards; up 
to 200 data fields may be described. 


The REC cards previously described had each suffix, A through Z, describing a 
unique record type. The fields to be developed from each record are found by matching 
suffixes. Thus, when it is determined that RECC is the current input record and the 
action is not IGNORE, all fields having a C suffix are developed from this current input 


record, 


The initial order of the FLD cards determines the order of the fields in the re- 
sultant dataBASIC records; therefore, the fields identifying the record should be placed 


ahead of other FLD cards for the same record. 


Determine the fields to be developed from each record and enter the identical 
suffix in column 4; then describe each field in the following manner: 


1 INPUT USAGE, columns 5-6. The following entries are acceptable and 
have these designations; 


e AN or BB designates 6-bit alphanumeric information. 
e 9% or B9 designates 6-bit numeric information, 
® C% or BC designates single or double precision floating point 


and is identical to the COBOL COMP. 
e Cl designates a fixed binary value. 


e C2 designates a single or double precision floating-point value 
and is identical to the COBOL COMP-z. 


e 1% or BI designates a FORTRAN type integer. 
e R# or BR designates a FORTRAN type real number without an 
te 
exponen nee ene 


2. DECIMAL POINT, column 8. If the input usage is AN, I, or C2, an entry is 
not required and is invalid. If the input usage is R, any explicit decimal 
points will be recognized and overriden. If the value is a number, leave the 
field blank or enter the number of digits (not to exceed six) to the right of the 
decimal point. 


Enter the FROM and TO character positions of the data. There are 


restrictions in data size based on input usage; these restrictions are shown 
in Figure 2-2; 


24 characters 


24 characters 


18 characters, with maximum of 12 
to left of decimal point, 6 to right 


12 characters input 
12 characters input 


12 characters input 


Figure 2-2, FLD Cards Data Base Size Restrictions 


Ce FIELD NAME, columns 17-40. Enter the dataBASIC field name to be 


assigned to this field. This field must follow the rules for dataBASIC 
field names. 


4. CHARACTER CONVERSION. If character conversion is to be done 
against this field and a CONV card is also submitted, enter any value 
in column 41. Only a field described as input usage AN can have 
character conversion applied to it. 


oe CONTROL FIELD. Up to ten fields may be designated as controls. 
If this field is to be one of the controls, enter any value in column 42, 
For each control field, the number of times it is output will be re- 
corded; if it is numeric, the sum of its output values will be recorded. 
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6. EDITING. The next four entries pertain to a limited edit of the data. 
In all cases where data does not pass the edit, the edit is not output, 
although other fields in the same record may be output. 


ALPHANUMERIC EDIT, column 44, Enter A for an alphabetic 
check and N for numeric. Only a field with input usage of AN 
can be edited for alpha and with 9, I, or R for numeric. 


BLANK-ZERO EDIT, column 45. Enter B for blank check and 
Z for zero check, Only a field with input usage of AN can be 
edited for blank and all others for zero. If the field is blank or 
zero, it will have failed the edit. 


Te CONVERTING, column 68. The converting option permits input values 
to be converted to a user-designated output value. The CVT (suffix) 
cards are input and compose the tables, all of one suffix becoming one 
table. 


Enter in column 68 the suffix (A through Z) of the table to which this 
data is to be converted. If the item is found in the table, its replace- 
ment value will be output; if not found, it will be considered to have 
failed this edit, and the field will not be output. 


If the convert option is utilized, additional EDITING options are not 
allowed and are considered invalid. 


8. OUTPUT USAGE, columns 69-70. Enter the output usage of the data. 
One of two entries is allowed -- AN for alphanumeric, or FP for 
floating point. A blank output usage is considered to be AN. (If the 
input usage was an AN, the output usage must also be AN.) In 
general, the usage would not be AN for those items used in computations. 


a OUTPUT DECIMAL POINT, column 71. An entry is required only 
where the input usage was one of the six types of numeric data and the 
output usage is to be FP. If no decimal point is desired, leave the 
column blank. If a decimal point entry is made, a decimal point will 
be properly positioned and inserted in the data. The entry cannot 
exceed six and signifies the number of digits to the right of the decimal. 


10, OUTPUT RECORDS, columns 72-80. As previously mentioned, up to 
nine output records may be generated, and the numbers 1 through 9 
identify these records, 


Enter the number of identifiers of all records this field is to be output 


on. (A field may be designated that is only used for comparison and 
not as output; if so, the columns should remain blank. ) 
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LITERALS 


One other option is available through FLD cards - the generation of a fixed literal 


to be output on selected records. In this option the following entries should be made: 


Append some valid suffix (A through Z) to the FLD column 4. 
Enter LB or BL in columns 5-6. 
Enter a valid field name. 


Enter the value in columns 44-67. If the value is alphanumeric, enter it 
left justified with trailing blanks; if numeric, enter it right justified and 
do not enter a decimal point. 


Enter the usage of the data in columns 69-70, OUTPUT USAGE. 
Enter any required decimal point in column 71. 


Enter the record identifiers that this field is to be output on. 


Any other entry on a literal card is either invalid or ignored, 


EDT CARDS 


Edit tables are constructed through input of EDT (suffix) cards; the suffix must be 


A through Z and is identical to the suffix specified in column 46 of the appropriate FLD 


card. All entries having the same suffix become one table. 


Although there is no restriction as to the size of one table, all the tables combined 


cannot exceed a count of 2000 with an alphanumeric entry counted as 2 and a floating 


point counted as l. 


The EDT card should be prepared in the following manner: 


Append the proper suffix in column 4. 


Enter the type data as either AN or BH for alphanumeric or FP for floating- 
point numeric. 


If the entry is AN or BH, no entry is allowed in DECIMAL or SIGN, and the 
data is entered left justified in column 9 with trailing blanks. 


If the entry is FP, enter the number of digits (not to exceed six) to the right 
of the decimal point in column 7. Enter A - in column 8 if the data is minus, 
or else leave blank. Enter the data right justified in column 32, with leading 
blanks; also, do not include a decimal point in the data. (The data type on 
the entries must be the same; the data type of the table must be compatible 
with the input usage of the data to be edited against.) 
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RNG CARDS 
The range table is constructed through input of RNG (suffix) cards. The suffix must 
be A through Z and is identical to the suffix specified in column 48 of the appropriate FLD 


card. Only one entry per suffix is allowed, or a maximum total of 26 RNG cards. 


The RNG card should be prepared in the following manner: 


e Enter in columns 5 through 32 the minimum range value. (The procedures 
are the same as for the EDT cards.) 


® Enter in columns 37 through 61 the maximum range value. The data type and 
decimal position, if any, are assumed to be the same as for the minimum 
value. If the maximum value is numeric and a minus, enter A= in column 37, 
or else leave it blank, Enter the data, left justified for floating point, in 
columns 38 through 61. (The data type of the table item must be compatible 
with the input usage of the data with which it is to be compared. ) 


CVT CARDS 

Convert tables are constructed through input of CVT (suffix) cards. The suffix must 
be A through Z and is identical to the suffix specified in column 68 of the appropriate FLD 
card. All entries having the same suffix become one table. There is no restriction on 
the number of items in any one table, but all the convert tables combined must not exceed 


1000 entries. 


In columns 5 through 32, enter the FROM value; in columns 34 through 61, enter 
the value to which it is to be converted. (The procedure for entering a value is the same 


as for the EDT cards.) 


The data type on the TO value does not have to be the same as that on the FROM 


value. 


SELA THROUGH SELJ CARDS 

The Selection Criteria Option is initiated through the preparation of SELA through 
SELJ cards; up to ten criteria may be established. Each time output is called for ona 
REC card, the selection criteria will be analyzed; if a true condition is found, data will 
be output. If a false condition is found, all output is suppressed until, through new data 


values, the condition is true. 
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Each of the ten criteria consists of a comparison between the latest value ina 
given field and the latest value in another field name or user-designated value; or, the 
latest value in a given field is checked for validity; that is, did it pass its most recent 


editing ? 


Beginning with the SELA card, each card should be prepared in the following 


manner: 
e Enter the elected field name, left justified, in column 5; this must 
be the field name entered on one of the FLD cards. 
e Enter the comparison type in columns 29-30; the valid entries and 


their meanings are indicated in Figure 2-3. 


Meaning of Entry 


Greater or equal 
Less or equal 
Equal 

Not equal 
Greater 

Less 


Valid 


If VA is entered, no 
entries are permitted 


in columns 31 through 
56: 


Figure 2-3. Comparison Type Valid Entries and Meanings on Selection Cards 
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e In columns 31-32 of the Selection cards, enter the value which is to be com- 
pared with the first field name value. Figure 2-4 lists the allowable entries 
and their meanings. 


Meaning Comments 


The value in another If data type (columns 31-32) 
field name is DN, enter the field name 
or the other value left~- 
justified in column 35. This 
must also appear as a field 
name on one of the FLD cards, 
and these two fields must 
have a compatible input usage. 


A user-submitted If data type is AN, enter the 
alphanumeric constant desired value left-justified 
in column 35. 


A user-submitted If data type is FP, enter any 

numeric constant decimal point indicator in 
column 35. This cannot be 
greater than six and signifies 
the number of digits to the 
right of the decimal point. If 
the value is a minus, enter 
A- in column 34. Enter the 
value left-justified in 
column 35. 


Figure 2-4. Data Type Valid Entries and Meanings on Selection Cards 


2-11 #DAO09Y 


e If this is the last selection criteria, leave the AND/OR (columns 59-61) blank 
or else enter AND or ORB. Figure 2-5 is a guide for the utilization of 
AND/OR. 


Continue with next SEL 
Generate Output. 


Continue with SEL following 
next OR. If no additional 
OR, suppress output. Con- 
tinue with next SEL 
Suppress output. 


Figure 2-5, AND/OR Utilization on Selection Cards 
ENDEND CARD 


The ENDEND card must be the last card in the control card deck. If a listing of the 


converted data is desired, enter LIST in columns 7-10. 
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INPUT CARD DECK SETUPS 


Phase I Control Cards 


Phase I control cards are used only for load of new input. 


Card Columns Remarks 


8 16 


SNUMB 

IDENT OPTIONS 

OBJECT DBINIT (DBINIT Object Deck) 
OBJECT BCIASG (BCIASC Object Deck) 
EXECUTE 

LIMITS XX, 32k, ,XXXX 


$ 
$ 
$ 
$ 
$ 
$ 
$ 


This card would change with the 
peripheral where the input is. 


SYSOUT Or BMC if volume is large. 
TAPE 

ENDJOB 

EOF 


Figure 2-6. Phase I (DBINIT) Control Card Format 
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Phase II Control Cards 
Phase II control cards are used only for unload of old dataBASIC file. 


ye eee oe 


$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 


SNUMB 
IDENT 
USERID 
OBJECT 
EXECUTE 
LIMITS 
PRMFL 
DATA 
CREATE 


TAPE 
OBJECT 
EXECUTE 
TAPE 
TAPE 
NTAPE 
OBJECT 
EXECUTE 
LIMITS 
TAPE 
TAPE 
TAPE 
TAPE 
TAPE 
SOURCE 
EXECUTE 
TAPE 
TAPE 
NTAPE 
ENDJOB 


Card Columns 


16 


OPTIONS 
OPTIONS 


DBUNLD 


XX, 16k 


Al, R, R, (IDENT) 


~Q 


FC/Al1/, BSSZ/XX/, 
RNG/1, XXX/, PGSZ/ 
192/,INV/NO 


UN, X3S 
DBSRTA 


UN, X3D 
UB, X4S 
$1, X, 3 

DBTRIP 


XX 

UB, X4D 
VB, X5S 
VA, X5R 
DB, X6D 
UT, X7S 
DBSRTD 


UT, X7D 
OT, X8D 
S1, X,3 


Figure 2-7. 


Remarks 


(DBUNLD Object Deck) 


(DBSRTA Object Deck) 


(DBTRIP Object Deck) 


(DBSRTD Object Deck) 


Phase II Control Card Format 
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Phase III Control Cards 


Phase III control cards are used for file unload. 


Card Columns Remarks 


16 


SNUMB 
IDENT OPTIONS 


OBJECT DBSRTB (DBSRTB Object Deck) 
EXECUTE 


(OPTIONAL) NEW FILE 
(OPTIONAL) OLD FILE 


OBJECT DBLODA (DBLODA Object Deck) 


OBJECT BCIASC (BCIASC Object Deck) 
EXECUTE 


FILE CA, X10R 
TAPE CB, X11D 


TAPE DB, X6D (OPTIONAL) OLD FILE ONLY 
ENDJOB 


NOTE 


Output from this phase includes number of links required for the dataBASIC 


file. 


Use the following formula for calculating base size (cf. x1 on next 


page) _and maximum page range (cf. aA on next page) and temporary links 


(cf. 


ste 
AS 


on next page) 


Let S = links requested 

Let L = links required 

Let B = base size 

Let R = maximum page range 


B= 20*(L+ 1) -this corresponds to 
R= 20% -this corresponds to * 
S= L+1l -this corresponds to * 


Figure 2-8. Phase III Control Card Format 
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ln 


V Control Cards 


Phase IV control cards are used to load the new data base. 


eee Sa ae AA -A 
—N 


nN 


$ 
ID 
$ 
$ 
$ 
$ 
$ 
$ 
ID 


n 


Hh PHAR HARAHAHA FAFA APA HHA AALS 


Card Columns 


8 


SNUMB 
IDENT 
USERID 


PROGRAM 
LIMITS 
FILE 
DATA 
CREATE 


DATA 
INIT 
OBJECT 
OBJECT 
EXECUTE 
LIMITS 
FILE 
DATA 
CREATE 


TAPE 
TAPE 
TAPE 
TAPE 
TAPE 
FILE 
OBJECT 
EXECUTE 
FILE 
FILE 
FILE 
NTAPE 
FILE 
OBJECT 
EXECUTE 
FILE 
DATA 
CREATE 


FILE 


Figure 2-9. 


16 


OPTIONS 

CATALOGUE -NAME$LOG- 
ON-PASSWORD 

QUTU 

OPTIONS 

Al, X1S,* R 

2Q 1 

FC/Al/, BSSZ/* /, RNG/ 
1,*°/, PGSZ/192/, INV/NO/ 


DBLODB 
DBTABL 


re) 

FC/AI/, BSSZ/*'/, RNG/ 
1,*° /, PGSZ/192/, INV/NO/ 
CB, X11D 

OT, X8,D 

NT, X2D 

AT, X9D 

DB, X6D 

VR, X12S 

DBSRTC 


VR, X12R 
Tl, X13S 
T2,X13R 
Sl, X,3 

DR, X14S 
DBLODC 


Al, X1S, *°R 
7_@) 


1 
FC/Al/, BSSZ/* /, RNG/1, *“/ 


» PGSZ/192/,INV/NO/ 
DR, X14R 


2-16 


Remarks 


INITIALIZE dataBASIC FILE 


(DBLODB Object Deck) 
(DBTABL Object Deck) 


(OPTIONAL) OLD FILE 
(OPTIONAL) NEW FILE 


(OPTIONAL) OLD FILE 


(DBSRTC Object Deck) 


(DBLODC Object Deck) 


Phase IV Control Card Format (continued) 
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Card Columns Remarks 


16 


PROGRAM | QUTU DUMP dataBASIC FILE 
ON TAPE 
LIMITS 10, 24000 


DSPK Al, XS, *°R 
DATA mo) 
1 

CREATE FC/A1/, BSSZ/*' /, RNG/ 

1, *“/, PGSZ/192/, INV/NO/ 
TAPE OT, X15D 
DATA Lk 
WRITE FC/A1/, RNG/1, *“/, ONFC/OT/ 
ENDJOB 


Figure 2-9. Phase IV Control Card Format (continued) 
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Phase V Control Cards (Pass One) 


USERID 


CCREAT 


$ 


USERID 


FCREAT 


> 
USERID 


FCREAT 


Figure 2-10. 


Card Columns 


SNUMB 
IDENT 
FILSYS 


USERID -SPECIFIED-IN-PHASE-III $ 
LOG-ON-PASSWORD 


USERID-SPECIFIED-IN-PHASE-III/ 
subcat-name/, PASSWORD/ password/ 
» DEVICE /not-a-DSU200/ 


FILSYS 


USERID-SPECIFIED-IN-PHASE-III $ 
LOG-ON-PASSWORD 


USERID-SPECIFIED-IN-PHASE-III/ 
above-subcat-name/. DATAO, DEVICE/not- 
DSU200/, MODE/RAND/, SIZE/links - 


specified-by-PHASE III, links-spec-by- 
PHASE III/ 


FILSYS 


USERID-SPECIFIED-IN-PHASE-III $ 
LOG-ON-PASSWORD 


USERID-SPECIFIED-IN-PHASE-III/ 
above-subcat-name/.JOUR., DEVICE/ 
not-DSU200/, MODE/RAND/, SIZE/ 
links -calculated-from~-formula-on-= 
page-1-10 links-calculated-from - 
formula-on-page-1-10/ 


ENDJOB 


16 


OPTIONS 


Phase V Control Card Format (Pass One) 
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Phase V Control Cards (Pass Two) 


Card Columns Remarks 


SNUMB 
IDENT 
PROGRAM 
LIMITS 
DATA 
CREATE 


PRMFL 
TAPE 
DATA 


WRITE 
ENDJOB 


16 


OPTIONS 

QUTU 

10, 24000 

~Q 

FC/Al/, BSSZ/XX/,,RNG/ 

1, XX/, PGSZ/192/, INV/NO/ 

Al, R/W,R, unc/dBname/.DATAO 
DT, X1D,, NNNN,, 

Lx 

FC/DT/, ONFC/A1/ 


NOTE 


Base size and range maximum are equal to the link size of the dataBASIC 
file multiplied by 20. Each link is comprised of 12 blocks. 


Figure 2-11. Phase V Control Card Format (Pass Two) 
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Figure 2-12, DBINIT Record Definition and Selection Card Key Punch Guide 
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Figure 2-13. DBINIT Field Definition Card Key Punch Guide 
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Figure 2-14, DBINIT EDT, RNG, and CVT Parameter Key Punch Guide 


SECTION III 
PROGRAM DESCRIPTIONS 


This section of the Implementation Guide contains discussions of all programs used 
in the dataBASIC Load/Unload System and is organized in the order of the five phases in 


which the programs appear. 


PHASE I PROGRAM (DBINIT) 


CONTROL 
CARDS 
OLD 1 
STANDARD 
FILE 
(IN) 


OLD CARD 
FILE 
IN ) 


Input 
Input for the DBINIT program should be the standard file that the dataBASIC data 


is to be abstracted from and the required control cards. 


Processing 
The program reads in the control cards from the I* file, edits each card, and stores 
the necessary data. If any errors are detected in the control cards, the program will 


terminate after processing all the control cards. 
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Next, the input is processed as directed by the control cards, and the New Triplets 
and optional listing are generated. If a TEST option is included, the program terminates 
after the requested number of input reads. Finally, after reaching an end-of-file or an 


end-of-test, the program cioses the input and output files and generates control totals. 


Output 
Output consists of the New Triplets (NT) file constructed from the standard file and 


the interaction of the control cards, and an optional listing of the generated Triplets. 
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PHASE II PROGRAMS 


DBUNLD 
UN BASED 
RECORDS 
(UN) 
Input 


Input for DBUNLD consists of the dataBASIC file, in I-D-S format, to be unloaded. 


Processing 

The program reads in the data base, processing each record on the dictionary side. 
All records except .ICTLR and Page-Header are output. The .IVALR has its Direct- 
Reference appended to it; the .IINDR record has the Direct-Reference of the .IVALR, 
to which it is linked, appended to it. 


It then processes the record range walking the .IALIM chain and assigning a 
sequential entity number to each .IENTR. As each .JENTR is found, its .IETXM chain 
is walked, putting out each .ITXTR record with its master's entity number appended. 
The .IEOCM chain is also walked, putting out each .IOCCR with its associated entity 
number along with the Direct-Reference of the .IVALR record to which it is linked. 


NOTE; The dataBASIC records as they appear on the tape files 
will be referred to on the succeeding pages without the 
dot prefix; the dot prefix will be retained when referring 
to the records as they exist on the mass storage device. 


The output records have a sorting key inserted as the first two characters. 
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Output 


Output consists of a standard file (UN) containing one record for each data record 


in the data base. 


DBSRTA 


Input 


UNBASED 
RECORDS 
(UN) 


DBSRTA 


Input for DBSRTA is the file (UN) created in DBUNLD. 


Processing 


In a pre-sort procedure, the input records are expanded to 120 characters, giving 


a fixed-length record; in a postesort, they are truncated to their established length. The 


records will be sorted in the following sequence: 


IFILR 
IPNMR 
ISYNR 
ILOKR 
IVALR 
IINDR 
IOCCR 
ITXTR 


(SEQ. 
(SEQ. 
(SEQ. 
(SEQ. 
(SEQ. 
(SEQ, 
(SEQ. 
(SEQ. 


1); 
Z)% 
3)t 
4): 
5): 
5): 
6): 
7): 


OLD-NAME CODE, 

OLD-NAME CODE, 

OLD-NAME CODE, 

DIREC T-REFERENCE, VALUE, SORT-KEY ~ZERO, 
IVALR DIRECT-REFERENCE, VALUE,SORT-KEY =l, 
IVALR DIRECT-REFERENCE, OLD-NAME CODE, 
ENTITY NUMBER, TEXT NUMER 


(The IVALR and IINDR records are intermixed since they have the same sequence 


of 5. Their major key is really IVALR Direct-Reference. An equal condition is always 


broken by their second assigned sort-key or zero or one.) 
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DBTRIP 


TEMP 
VALUES 

OUT 

(VB) 


OTHER 
DBTRIP DATABASE 
RECORDS 
TEMP (DB) 
VALUES 


IN 
(VA) 


INPUT TO DBLODB 


Input 
Input for DBTRIP is the unbased file (UB) of dataBASIC records sorted by DBSRTA. 


Processing 


The program processes the input and branches based on the type of record read in. 
If the record is: 


IFILR - Write it out on the other records (DB). 

IPMMR Store it in a table up to a maximum of 500 occurrences; 
also, write it out on other records (DB). 

ISYMR - If itis a true synonym, write it out on other records (DB), 
or ignore it. 

ILOKR - Write it out on other records (DB). 

IVALR - Write it out on temporary file (VB) and save it internally. 

IINDR - If itis a true synonym value, write it out on other records 
(DB), or else ignore it. 

IOCCR - At the first IOCCR the temporary file of values being output 
(VB) is closed and opened as input (VA) For each occur- 
rence, a Triplet is constructed from data in the IOCCR, the 
IVALR, and the table of prime names. 

ITXTR - Each text record is output on the other records file (DB). 


Output 
Output consists of the old Unsorted Triplets (UT) from the original data base. 


(Other records from the data base that do not format into triplets are on a separate file 


(DB).) 


A temporary file of all value records (VB) is output and then processed as input 


(VA) against the occurrence records. 
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DBSRTD 


IN 
TDTDT LT S 


oe Oe SS oe 


SORTED 
(UT) 


DBSRTD 


OLD 
TRIPLETS 
(OT) 


Input 
Input consists of the Old Unsorted Triplets (UT) output from DBTRIP. 


Processing 


Processing consists of sorting the Triplet records in ascending sequence on entity 


number. 


Output 
Output consists of the Old Triplets (OT) sorted on entity number. 
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PHASE II PROGRAMS 


DBSRTB 


AND/OR 


OLD 
TRIPLETS 
(OT) 


ALL 
CONTROL DBSRTB TRIPLETS 
CARD (AT) 
I*) 


Input 
Input consists of one control card from I*; if doing new, (the New Triplets (NT), 


and/or old, (the Old Triplets (OT). 


Processing 

The program consists of a pre=sort, sort, and post-sort. The pre=sort accepts 
the control card from I*, edits it, saves it, and, if valid, writes it on the control file. 
If the card is not valid, it displays "INVALID CARD" and terminates the activity. From 
the control card it knows whether to do Old Triplets (OT) and/or New Triplets (NT). It 
reads in each as required and releases each record to the sort. It also develops how 
many entities and triplets are on each file and outputs this information on the control file. 


The triplets are then sorted, ending with Old and/or New Triplets merged into one file. 


In the post-sort, the number of occurrences and unique values is developed for each 


prime name; this information is also output on the control file. 


Output 
Output consists of Control file A (CA) containing information for developing the new 
data base and All Triplets (AT) sorted on field name, field value, old or new, and entity 


number. 


3-7 #DA09 


DBLODA 


OTHER NEW FILE 
DATA BASE DBLODA SIZE & 


RECORDS PAGE RANGE 


(DB) 


Input 
Input consists of the Control file A (CA) developed in DBSRTB and, if doing old, 
the other records from the Data Base file (DB) developed in DBTRIP. 


Processing 
The program constructs a new IFILR record or modifies an already existing old 


one; it calculates the new data base size to links and pages. 


Output 
Output consists of a new Control file B (CB) and a listing of new data base size and 


page range. 
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PHASE IV PROGRAMS 


DBLODB 


CONTROL OLD ALL 


FILE 
(CB) 


TRIPLETS 


(OT) TRIPLETS 


(AT) 


DBLODB 


Input 
Input for DBLODB consists of: the Control file B (CB) from DBLODA; other Data 


Base records (DB) from DBTRIP; Old Triplets (OT) from DBSRTD; New Triplets (NT) 
from DBINIT; and All Triplets (AT) from DBSRTB. 


Proces sing 


The I-D-S data base description in this program is not complete; it is described as 
if chains .IVIXN and .IVOCN did not exist. The chain pointers which could exist in IVALR, 
IOCCR, and ILINDR, but are not generated via I-D-S, are derived and inserted by the 
programs as data. The DBLODB program builds the new data base except for the chain 
pointers for .IVOCN. 


Output 
Output consists of a partially completed temporary dataBASIC file (Al) and a Value/ 


Occur Direct-Reference file (VR). 
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DBSRTC 


DBSRTC 


Input 
Input for DBSRTC is the Value/Occur Direct-Reference file (VR) developed in 
DBLODB. 


Processing 
The program consists of two sorts which develop temporary files Tl and T2 that 


are used only internally. 


The Value/Occur Direct-Reference file is read in, released to the sort, and sorted 
on name-code, value, special sorting key, and direct-reference. For a value record 
(IVALR) the special sorting key is one; for an occur record (IOCCR) itis two. Thus, 
the sort produces a ''CHAIN'" for each name-code, unique value pair, headed by the 


value record and followed by its occurrences. 
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In a post-sort procedure, an output file (T1) is developed, each record consisting 
of three direct-references and a special key. In all cases, the first reference is the 
direct-reference of the record. For a value record, the second reference is the direct- 
reference or its first occurrence; the third reference is not used, and the identifying key 


isal. 


For an occurrence record, the second reference is the directereference or the 
next occurrence; the third reference is the directereference or the value record for 
linked-to-master, and the identifying key is a2. For the last occurrence, the second 


reference is the directereference or the value record. 


The second sort sorts these developed records on their own direct-reference, 


arranging them in file sequence for efficient insertion of their chain pointers. 


Output 

Output consists of a Direct-Reference (DR) file containing the missing chain 
pointers. The sequence of these pointers is by the I-D-S Direct-Reference (DR) of the 
record to which they apply. 
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DBLODC 


Input 
Input is the Direct-Reference (DR) file from DBSRTC. 


Processing 


The I-D-S data base description in this program is not complete; it includes only 
the .IVALR and .IOCCR records, since these are the only records modified. Also, their 


chain pointers are described as data. 


The program reads in each record from the Direct-Reference file. Using the 
first of the three references, it retrieves a record directly from the I-D-S data base, 
ensures that it has retrieved the proper record type, and inserts the missing chain 


pointers. 


Output 
Output consists of a completed temporary dataBASIC file (Al) and a Dump Tape 


(DT) containing all the data on Al. 
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PHASE V PROGRAMS 


Pass One 


CONTROL 
CARDS 


CREATE 


dataBASIC 
FILE 


Input 


Input consists of the file system control cards. 


Proces sing 


The Phase V program is more a procedure than a program. In pass one, several 
file system activities are performed which include the creation of a subcatalogue using 
dataBASIC file names provided by the user, and the creation of two subordinate files -- 


»DATAO (the user's file) and .JOUR. (the recovery file). 


Output 
Output consists of the dataBASIC file and the recovery file. 
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Pass Two 


(Dump tape from 
Phase IV) 


QUTU 


I-D-S 
LOAD dataBASIC 
FILE DATA BASE 


Input 
Input is the file DT created in Phase IV. 


Processing 
Pass two of Phase V consists of using the I-D-S Utility Routine QUTU to read in 


the data file from file DT and placing it on the disk file created in pass one of Phase V 
as the user's dataBASIC file. 


Output 
Output consists of a complete dataBASIC file. 
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SECTION IV 


OUTPUT 


Only Phase I and Phase II of the dataBASIC Load/Unload System generate printed 
output reports; each of these reports is explained and illustrated in this section of the 
Implementation Guide. The reports generated in Phase I include the Load/Unload 
Control Card Listing, the Triplets Report, the Triplets Record Count Report, the 
Output Count Report, and the Control Field Report. Phase III generates only one report 
which is the File Size Criteria Report. 


LOAD/UNLOAD CONTROL CARD LISTING 
This report, illustrated in Figure 4-l, is generated by the DBINIT program and is 


a card-image listing of all the Phase I Load/Unload control cards. 


TRIPLETS REPORT 
These reports, illustrated in Figure 4-2, are optionally generated by the DBINIT 
program; they are the triplets formed from the input data along with the following 


descriptive information: 


e REC-TY -- output record type to which the triplet is assigned 
(defined in columns 72-80 of the FLD cards). 

e REC-CNT -- tally of the respective output record type. 

e FIELD NAME -- name of a field belonging to the respective record. 

e FLD-TY -- type of data contained by the respective field name 


(AN denotes alphanumeric data; 9 denotes numeric data). 


e FIELD VALUE -- value of the data contained by the respective 
field name. 


e NAM-LNG -- length in characters of the field name as it appears 
on the FLD control card. 


e VALUE LENGTH -- length in characters of the field value as it 
appears on the input data cards. 
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INPUT RECORD COUNT REPORT 
This report, illustrated in Figure 4-3, is also generated by DBINIT; it is a number 


count of each type input record submitted. 


OUTPUT RECORD COUNT REPORT 
This report, illustrated in Figure 4-4, displays the following information: 
OUT-RTY -- output record type. 
REC-CNT -- tally of respective record type. 


FLD-OCCUR-CNT ~-- total field names associated with the respective 
record type. 


NUMERIC-FIELD-SUMS -- a summation of all numeric values output 
under the respective record type. 


CONTROL FIELD REPORT 

This report, illustrated in Figure 4-5, displays information concerning fields 
designated as control files on the FLD card, for example: 

INP-RTY -- associated input record type. 


CNTRL-FIELD-OCCUR-GNT ~<-- total number of occurrences of the 
specified field. 


CNTRL-FIELD-SUMS -= summation of values of all numeric control 
fields. 


FILE SIZE CRITERIA REPORT 

This report, illustrated in Figure 4-6, is the only printed report not produced 
in Phase lI. Itis, instead, produced in Phase III and indicates to the user how many 
random links which must be assigned when creating the dataBASIC file in Phase V. This 
information is also used on the I-D-S/CREATE card in Phases IV and V; for example: 


DICTIONARY RANGE -- number of 1-D-S pages to be alloted for the data- 
BASIC dictionary range (page allocation is done 
internally by the Load/Unload programs). 


PAGES -- total number of I-D-S pages required by the dataBASIC file. 
LINKS -- total number of links required by the dataBASIC file. 
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RECA 
RECB 
RECC 
FLDA 
FLDA 
FLDA 
FLDA 
FLDA 
FLDA 
FLDA 
FLDA 
FLDA 
FLDB 
FELDB 
FLDB 
FLDB 
FLDB 
FLDBL 
FLDB 9 
FLDC 
FLDC 
FLDC 
FLDC 
CONVE! 
CVTA 


00050005 LONTPUTA 
2RETAIN 
SOUTPUT?2 
OOO7COLENAMENAMENAHE 
OOL900STNAMENAMENAME 
OOSLONSSCOSTICENTER 
OOS400S6SALARY 
O03S80042mMAIL* DROP 
OO430052EXTENSIONNAT 
OOSSO066EXTENSIONNAT 
00670078REPURTS: TO 
DATE 
00070016PROJECT 
OOLID02IEPA 
OO2500SCFUNDS 
00S1004ZRESP 
O0430C54STATUS 
JOB*NO 
OO550Cé6CBYNGET 
OOO070C18PRGVECTA 
OO190CSCASSIGNED 
OOSLOC42aSSIGNED 
OO430054aSSIGNED 


JIM 


ENDENDLIST 


Figure 4-1. 


FIRST 


URENATUREN 
URENATUREZ 


AB 
AB 
01/06//0 


AB 


Sample Load/Unload Control Card Listing 


FIELD NAMES AND VALUES INITIALIZED FOR DATA BASIC File 


REC 
TY 


REC FIELD 
CNT NAME 


FLO 
TY 


RESP 
STATUS 
JOB FINO 
BUDGET 
ASSIGNED 
ASSIGNED 
ASSIGNED 


AN 
AN 
AN 

9 
AN 


PROJECT 
EPA 
FUNDS 
RESP 
STATUS 
JOBSNO 
BUDGET 
ASSIGNED 
ASSIGNED 
ASSIGNED 


Figure 4 


VALUE 
LENG TK 


FIELD 
VALUE 


APPLTECH 
ON SCHEDJLS 
04982 
70000.C00090 
DRISSIN 
GARRISON 
WILLITT 


DATABASIT-1 
GSP 
ASTO 
APPLTECH 
50 % COMP 
04982 
2CQ00.0C0050 
BLOSI 
WILLITT 
NIAL 


-2Z. Sample Triplets Report 
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92/26/74 


PACE 


4 
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FIELD NAMES AND VALUES INITIALIZED FCR DATA “ASIC FILE 


REC 
CNT 


1 


A Ul oD 


Figure 4-3. Sample Input Record Count Report 


FIELD NAMES AND VALUES INITIALIZED FOR DATA FASIC FILS 


be 
e 
3 
4 
5 
6 
7 
8 
9 


-C 
r 


FLD OCC YR NIMER DS F{LeLT 
COUNT SUMS 


15/ 18U0.J00Utd 
45 146360,200uC6 


Figure 4-4. Sample Output Record Count Report 
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FIELD NAMES AND VALVES INITIALIZED FOR DATA PASIC FILE 


INP CNTRL FIELD CNTRL FLD CONTRO. FIELD 
RTY NCCUR CQUNT SUMS 


1  NAMENAMENAME 18 
2 PROJECT ? 
3  PROJECTA 


Figure 4-5. Sample Control Field Report 


DICTIONARY RANGE 
PAGES 40 


LINKS 2 


Figure 4-6. Sample File Size Criteria Report 
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FIELD-NAME 


LINECT 


MSGCTR 


WFROM/WTO 


FLD-MAX-CT 


CV T-STOR 


CTR-GROUP 


CONTROL-CT 


CONTROL-CARD 


RANGE-TABLE 


AN-RNGA 
FP-RGA 
AN-RNGB 


AN-RGB 


APPENDIX A 
DBINIT FIELD NAMES AND DESCRIPTIONS 


UTILIZATION 


Initially set to 1 million replaced by 
value on test card. Each read de- 
cremented by 1. Program terminates 
when this value equals zero. 


Controls end of page in printing. 


Used to subscript into error message 
table. If > zero program terminates. 


Used in unpacking FROM-TO char- 
acter positions and at times to save 
counters. 


One greater than the number of FLD 
cards readin. Must be maintained. 


One greater than the number of CVT 
cards read in. Must be maintained. 


CTRA through CTRG are counters 
used throughout the program. Re- 
definitions prefixed by x and y are 
used to store these as alphanumeric 
fields and conserve space in tables. 


Keeps track of how many control 
fields there are. 


Control cards are read into here. 
Through its 02 level redefinition it 
describes all of the control cards. 
Holds any requested RNG values 
stored in occurrence equal to their 
suffix. 

An alpha ''FROM" range. 

A numeric 'FROM" range. 

An alpha ''TO" range. 


Anumeric ''TO'" range. 
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FIELD-NAME LEVEL UTILIZATION 


CTL-VALUE A Ol These two groups are used to 
and identify control cards. They must 
CTL-VALUE B 02 be kept in sequence as branches 
are made based on location in the 
table. 
NAME -TABLE 01 A list of dataBASIC reserved 


words which cannot be used as 
field names. 


USAGE-TABLE 01 A list of valid control card data 
usages. They must be kept in 
sequence and the table cannot be 
added to without program mod-~ 
ification. See card #101000. 


MSG-GRP 01 A list of generated error messages. 
The field MSGCTR subscripts into 
this table. It must be keptin 
sequence but more may be added. 


RECORD-GRP 01 Holds the REC control cards 
stored in occurrence equal to 
their suffix. 


COMP-LIT 03 The six character literal from 
the control card. 


RWORDS 03 Presently not used. 


REC-OUT 03 Nine switches showing which out- 
put records should be generated. 
Zero = No. One =Yes. 


FLD-CTR 03 A binary value giving the occur- 
rence in the INFIELDERS table 
where the first FLD description 
for this record is. 


REC-OCCRS 03 Incremented by one each time 
this type of input record is 
processed. 

RTYPESW 03 Contains the action from the 


control cards. 1 =Ignore, 
2 = Retain, 3 = Output. 


CNR-REC-GRP 01 Same as RECORD-GRP above. 


Record being processed is moved 
to here to reduce subscripting. 
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FIELD-NAME UTILIZATION 


LTR-GRP A sequential alphabet table to con- 
vert letters to numeric values and 
back again. 


DEV -REC-GRP Various information needed to 
develop the type of input received. 


REC-WORD The word which contains the last 
character of a comparison key. 


REC-CHAR The character position of the last 
character from left to right equals 
1 to 6. 


REC-CHARCT The number of characters in the 
comparison key. 


MAX-RECS If the input is the type where a 
fixed-number of input records 
equals one entity, this contains 
the number. 


REC-CTR When dealing with a fixed number 


of records this field is incremented 
by one for each record. Reset to 
1 when greater than MAX-RECS. 


A list of the valid REC actions. 
Must be kept in this sequence. 


CVRT-TABL Used in character conversion. 
Initially set octally 1 through 77 
sequentially in each occurrence. 
From CONV card the 'FROM'" 
location is changed to the ''TO"! 
value. In conversion, the char- 
acter to be converted is changed 
to the value in its location. Zero 
cannot be converted. 


INFIELDERS Contains the 200 FLD control cards 
plus one occurrence as a stopper. 
See WFIELDER for a description 
of the individual fields. 


WFIELDER Holds one FLD record. 
FRECORD The suffix as a numeric. The 200 


occurrences are sorted on this 
field consolidating equal values. 
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FIELD-NAME LEVEL UTILIZATION 


FLSCHAR 02 The character position in the word of 
the last data character from left to 
right equals 1 to 6. Then, if data is 
alpha, 25 is added to it and the 
number of characters is subtracted 
from it. If numeric, 24 is added to 
it. Data is picked up in a 5 word 
(30 character) group. This puts a 
counter on either the first, if alpha, 
or last, if numeric, character wanted. 
It is set to 'L'' if the datais a 


literal. 
FNOCHAR 02 The number of data characters. 
FED-RNG-TY 02 A switch showing the Edit and 


Range Options. 


0 = Retain EDT and RNG HITS 
Delete EDT and RNG MISSES 


1 = Delete EDT HITS 
Retain RNG HITS 


2 = Retain EDT HITS 
Delete RNG HITS 


3 = Delete EDT and RNG HITS 


FWORD 02 The word in which the last char- 
acter of data is located. 


FNAME 02 The field name, left justified 
with trailing blanks. 


FUSAGE 02 The input usage. 1 = Alpha, 
= Six-Bit Decimal, 3= INTEGER, 
4 = REAL, 5 = COMP, 6 = COMP-1, 
7= COMP-2, 


FIDECPT 02 The input decimal point location. 
Maximum value is six. 


FALPNUN 02 Alphanumeric Edit Switch. Zero 
= None, 1 = Alpha, 2= Numeric. 


FBLKZER 02 Blank-Zero Edit Switch. Zero = 
None, 1 = Blank, > l= Zero. 
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FIELD-NAME LEVEL UTILIZATION 


FCHCONV The convert switch. Zero= No, 
l = Yes, 


The convert switch. Zero = No; 
greater than zero is the numeric 
value of the convert table to use. 


The Edit Switch. Zero = No; 
greater than zero is the numeric 
value of the edit table to use. 


The Range Switch. Zero = No; 
greater than zero is the numeric 
value of the range occurrence to 
use. 


The control field switch. Zero = 
No; greater than zero =Yes and 
the value is the occurrence of 
FLD-CONTROL in which these 
field controls are gathered. 


FOUSAGE The output usage. 1 = Alpha, 
2 = Numeric. 


FODECPT The output decimal point location. 
FV ALUE The alpha developed data. 
FPVALUE The numeric developed data. 
FORECS The output records which contain 
this field. Nine possible. Zero 


is No, 1 = Yes. 


FNAME-LGT The number of characters in the 
field name. 


FDATA-LGT The number of character positions 
occupied by the data. Numeric is 
automatically 12. 


FDELE-SW The Delete Switch. l= data did 
not pass all of the editing criteria 
and is not to be output; Zero = 


output. 
FCODE Field Name Code, 
DATEIM The date and time. 
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FIELD-NAME LEVEL UTILIZATION 


ERR-GRP Ol Error messages are built and 
written to the printer from here. 


HEADA, B and C Ol Report heading lines. 

PGCNT 01 A page counter for the output 
report. 

DE TLINE Ol Report detail lines are built and 


written to the printer from here. 


REC-LINE 01 Report control lines documenting 
the amount of input processed are 
built and written to the printer 
from here. 


CTRL-CT Ol Output record controls are devel- 
oped here. One occurrence for 
each type of record. 


REC-CT 02 Incremented by one each time 
record is output. 


TRP-CT 02 Incremented by one for each 
field output to this type record. 


CTR-VAL 02 The sum of all of the numeric 
fields output to this type record. 


DEV -LIT Ol This, along with its 5 rede- 
finitions, is used to develop a 
REC comparison key, right 
justified with leading blanks. 


SELECT-GROUP Ol Sixty characters from each SEL 
card are initially stored here 
based on its suffix. After the 
END card they are interpreted, 
formatted, and stored again in 
their proper occurrence. See 
SET-SELECT for a description 
of the individual fields. 


EDIT-CTRS Ol Occurs 26 times, one for each 
possible edit table and the occur- 
rence corresponding to the 
numeric value of the suffix letter. 


ESTART 02 The occurrence in the table of edit 
values where the table starts. 
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FIELD-NAME LEVEL UTILIZATION 


One greater than the last occur- 
rence in the table of edit values. 
for this table. 


ED-TY PE The type of data in this edit table. 
"AN'' = Alpha 
"FP' = Decimal 


EDIT-VALUES A table containing the edit values. 


ED-AN An alpha value. These are loaded 
from the top down. 


A decimal value. These are loaded 
from the bottom up. 


STORAN A counter to store alpha values in 
the edit table. Incremented by one. 


STORFF A counter to store decimal values 
in the edit table. Decremented by 
one. 


STORTL A counter to control storing of 
edit values. Incremented by 2 
for decimal and by 4 for alpha. 
If greater than 4000, table has 
overflowed. 


SORT-EDIT The numeric value of each EDT 
suffix is stored here on input in 
same relative position as the 
data. This table is used to sort 
the edit values. 


COMP-GROUP A table of the valid comparison 
types. This table must be kept 
in sequence. 


GROUP-SELECT Used to interpret the SEL con- 
trol cards. Defines col. 4 through 
64 of the card. 


SET-SELECT A group to control the selection 
process. There are up to ten of 
these stored in SELECT-GROUP. 


FLDLOCA The occurrence in the INFIELDERS 
table where the field data is. 
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FIELD-NAME LEVEL UTILIZATION 


FLDLOCB 03 Zero if the compare to fieid is A 
value. If it is a Data-Name (DN), 
the value in this field is its occur- 
rence in the INFIELDERS table. 


CMPR 03 The comparison type. 
1 = GR 
2 LS 
3 = EQ 
4= GE 
b= LE 
6 = NE 
T= VA 
ANDOR 03 The AND/OR entry. Zero = blank, 


1 = AND, 2 = OR. 


SEL-VAL 03 The value to be compared to. In 
SEL-FP if decimal. 


COMP-TYPE 03 Defines the type of comparison to 
be made, 1= Alpha Data, 2 = 
Decimal Data. 


CV T-TABLE 01 A table containing up to 1000 CVT 
values. 

AN-CV T-FROM 03 The alpha field to be converted from. 

FP-CV T-FROM 04 The decimal field to be converted 
from. 

AN-CV T-TO 03 The alpha field to which it is con- 


verted to. 


FP-CVT-TO 04 The decimal field to which itis 
converted to. 


CV T-CTRS 01 Occurs 26 times, one for each 
possible convert table and the 
occurrence corresponding to the 
numeric value of the suffix letter. 


CS TART 03 The occurrence in the CVT table 
where this table starts. 


CSTOP 03 One greater than the last occur- 


rence for this table in the table of 
CVT values. 
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FIELD-NAME LEVEL UTILIZATION 


CV T-TY PE The type of data to convert from. 


AN = Alpha 
FP = Decimal 


SORT-CVT The numeric value of each CVT 
suffix is stored here on input in 
same relative position as the data. 
This table is used to sort the con- 
vert values. 


FLD-CONTROL Up to ten control fields are 
allowed and their totals are 
developed here, 


FLD-SUN If the field is decimal on output, 
it is accumulated here. 


FLD-NAME The name assigned to this field. 


FLD-OCCURS Incremented by one for each out- 
put occurrence of this field. 


FLD-USE 1 = Alpha, 2= Decimal. 
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APPENDIX B 
ERROR MESSAGES 


INV ALID ID 
NO END CARD 


ERRORS ABORTED 
RUN 
END OF TEST 
NORMAL TERMINATE 
INV IGN-RET-OUT 
BLANK IGN-RET-OUT 
INV RECORD OUT 
INV FIELD NAME 
INV INPUT USAGE 
TOO MANY CONTROLS 
INPUT DECIMAL 
POINT 
CHARACTER CONVERS 
CONVERT AND EDIT 
ALF A-NUM CHECK 
BLANK-ZERO CHECK 


INV OUTPUT USAGE 


OUTPUT DECIMAL 
POINT 


MSGCTR 
VALUE MESSAGE MEANING 


ID of control card is not valid. 


The required ENDEND card was not 
found. 


Run was terminated because of 
control card error. 


Run terminated after required 
number of test reads. 


Run terminated normally at input 
end of file. 


Action is not IGNORE, RETAIN, 
OUTPUT or spaces. 


Action is blanks and not allowed 
except on RECA, 


Entry for record out is not l 
through 9. 


Field name does not meet edit 
criteria. 


Input usage is not BB, AN, BI, 18, 
BR, RB, B9, 9B, CB, BC, Cl, C2, C3. 


Have entered more than 10 control 
fields. 


Exceeds six or entry with AN field. 


Character conversion requested on 
non-alfa-numeral field. 


Edit requests with convert table not 
allowed. 


Entry is not A or N or not com- 
patible with usage. 


Entry is not Bor Z or not com- 
patible with usage. 


Invalid entry or not compatible 
with input. 


Exceeds six, or not compatible 
with output type. 
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MSGCTR 
VALUE 


MESSAGE 


OVER 200 FIELDS 


INV FROM-TO 


MISSING REC CARD 


INVALID SIGN 


DUPLICATE ENTRY 
INV EDIT/CUT CHAR 


INCOMPATIBLE AN/FD 


TOO MANY EDITS 


AND/OR NON-BLANK 


INV COMPARISON TY 


INV AND/OR 


INV FIELD TYPE 


INCOMPATIBLE COMP 


TOO MANY CONVERTS 
LITERAL IS BLANK 


EDIT/RNG OPTION 


NO EDIT TABLE 
MISSING CUT TABLE 


NO SUCH FIELD NAME 


NO SUCH INPUT RECORD 


MEANING 


Only 200 field descriptions are 
allowed. 


FROM exceeds TO = or too many 
data characters. 


A required REC card was not 
submitted. 


A sign entry on an AN item, or 
not B or-on an FP. 
Second RNG entry with same suffix. 


The entry for edit or convert is not 
A through Z. 


Items in the same table must have 
same usage. 


AN= 2, FP =1, and total exceeds 
2000. 


The last select card must have 
blank AND/OR. 


Select card comparison type is not 
GR, LS, EQ, GE, LE, NE. 


AND/OR is neither BOR nor AND. 


Field type is not AN, spaces, DN 
or FP. 


Field and input data not compatible 
in usage. 


Over 1000 convert cards. 
A requested FLD literal is blank. 


The option for EDT or RNG is not 
%, R, or D. 


No EDT data in the table requested. 
Requested convert table was not input. 


A field name in a SEL card does not 
exist. 


Have read a record that cannot be 


identified, Also prints value found in 
data. 
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APPENDIX CG 


RECORD TAPE FORMATS 


This appendix includes record formats for all tape records produced by the data- 
BASIC Load/Unload System. All tapes are in accordance with the GECOS standard system 


format described in detail in the Honeywell manual File and Record Control, Document 


Number CPB-1003G. 
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Ae 


60VC# 


TRIPLET KECORDS fice Copes 


Name Wane 


Title OT NT AT, UT 


| Numeese Vanue: 
Dovace PRecision 
Floating Point 


FIELD Wave 


(Ascr) 
Lerr Susrit/e£o TraiLing BLANKS 


ALPHANUMERIC VALUE: 


ENTITY 


FIELO 
INTERVAL 


(Binary) 


ENTITY 
RECORD 


3 BO BS DC 


PS g teal = * ae 


Counr = 


Torat. Unique Fiero anes 


Peime  Nane 


Figure C-1l. dataBASIC Load/Unload System Tape Formats 


~Fne Cove DB Tora. Kecoen Counr = Torae Teve Synonyn Nanes 
-fitE Cones UN. UB Toran KecorD Count Tora Synonym Names 


Title OYNONYM Name Fecoen 


Tora Recorn Count = Tome Loce *ecoeDs 


Tora kEcoro Guwr = Torae Nonsee Pring Values 


Prime Vacve  (A8CI) 


- Fite Cooe DB TorAL keEcoRoD Counr 
YB 


= Tora. True 
- fr1zzé Cone UN Tora. Recoron Count = 


ToTak Synonym Vaiues 


Figure C-l. dataBASIC Load/Unload System Tape Formats (continued) 


60V d# 


60V G# 


Title OCCURRENCE Fecorn (/OCCR -fne Cooes Uw. UB Tora. kecoen Count = Tora. Nunser TRIPLETS 


ASSIGNED 
% ZEROS | EnTITY 
Ms NUMBER 


TeExr 


(45c1) 


of 
SSS 


nt 
W 


5 e0 as z as 
(Tora TeipceTs) #_ (Tora 
TorAL kkecoRD CouNnr= pie Las ct oeps 
Varue (4scr) 
ss et = = = = | 
| _F4 bo 60 eS} q es 20 65 bg bs 


1 = VatveE Recoro 
oe = OccuRRENCE RECORD 


Figure C-1l. dataBASIC Load/Unload System Tape Formats (continued) 


TRIPLET 
COUNT 
@inae y) 


NV, AITE. 


FIELD 


2O 


GONTROL “KEcoekD 


CH4(N POINTERS 


t= Vatuve Pecoro 
2= Occurrence PRecoro 


ALY 


(Asc) 


-fize CoDes DR.71,7e2 Torac FEeowa Counr = 


= od 


Figure C-l1. dataBASIC Load/Unload System Tape Formats (continued) 


60V d# 


(yore reieeTs) © 
ToTaL_PRime Valve KE CORDS 


COMPUTER GFNFRATED INDEX 


CARD LOAD/UNLOAD 
CONV CARDe 2-4 LOAD/UNLOAD CONTROL CARD | ISTINGe 4eo1 
ENDEND CARD. 2-12 L/UNL 
FLD CARDe 2-5 L/UNL CONTROL CARDS. 2-1 : 
TEST CARD. 2-4 PHASE I L/UNL (DRINIT) CONTROL CARDS. 2-2 
CARD DFCK PHASE IIIT | UNL CONTRO! CARDS. 2-1 
INPUT CARD DECK SETUPS, 2-13 MERGE 
CARDS FIL& MERGE PHASF TII. 1-7 
CVT CARDS. 2-9 MESSAGFS 
EDT CARDS. 2-8 FRROR MESSAGES. Rel 
REC (SUFFIX) CARDS. 2-4 OUTPUT 
RNG CARDS. 2-9 OUTPUT RECORD COUNT RFPORT. 4=2 
SELA THROUGH SELJ CARNS. 2-9 OUTPUTe 4-1 
CONTROL CARD PASS ONE 
INPUT CONTROL CARDS. 2-1 PASS ONEe 3-13 
LOAD/UNLOAD CONTROL CARD LISTING. 4-1 PHASE Iv CONTRO! CARDS (PASS ONE). 2-18 
L/UNL CONTROL CARDS. 2-1 PASS TWO 
PHASE I CONTROL CARDS. 2-13 PASS TWOe 3-14 
PHASE I L/UNL (DBINIT) CONTROL CARDS. 2-2 PHASE V CONTROL CARDS (PASS TWO). 2-19 
PHASE II CONTROL CARNS. 2-14 PHASF I 
PHASE III CONTROL CARNS. 2-15 FILF INITIALIZING PHASF I. 1-3 
PHASE III L/UNL CONTROL CARDS. 2-1 PHASE I CONTROL CARDS. 2-13 
PHASE IV CONTROL CARNS (PASS ONE). 2-18 PHASE I L/UNL (DRINIT) CONTROL CARDS. 2-2 
PHASE IV CONTROL CARNS. 2-16 PHASE I PROGRAM *DBINIT). 3-1 
PHASE V CONTROL CARDS (PASS TWO). 2-19 PHASF TI 
CONTROL FIELD FILF UNLOAD PHASF TI. 1-5 
CONTROL FIELD REPORT. 4=2 PHASE II CONTROL CARDS. 2=14 
CaNv PHASE II PROGRAMS. 3-3 
CONV CARD. 2-4 PHASE III 
CREATION FILF MERGE PHASE III. 1-7 
FILE CREATION AND TRANSFER PHASE V. 1-10 PHASE III CONTRO! CARDS. 2-15 
CRITERIA PHASE III L/UNL CONTRO! CARDS. 2-1 
FILE SIZE CRITERIA RFPORT. 4-2 PHASE III PROGRAMS. 3-7 
CVT PHASE IV 
CVT CARDS. 2-9 FILF LOAD PHASF IV. 1-9 
OBINIT PHASE IV CONTROL CARDS (PASS ONE). 2-18 
DBINIT FIELD NAMES AND DESCRIPTIONS. A-1 PHASE Iv CONTROL CARDS. 2-16 
PHASE I L/UNL (DBINIT) CONTROL CARDS. 2-2 PHASE IV PROGRAMS. 3<9 
DBLODA PHASF V 
DBLODA, 3-9 FILE CREATION AND TRANSFER PHASE Ve 1-10 
DBLODB PHASE V CONTROL CARDS (PASS TWO). 2-19 
DBLODB. 3-10 PHASE V PROGRAMS. 3-13 
DBLODC PROGRAM 
DBLODC. 3-13 PHASE I PROGRAM *DRBINIT). 3-1 
DBSRTA PROGRAM DFSCRIPTIONS 
DBSRTA. 3-4 PROGRAM DESCRIPTIONS. 3-1 
DBSRTB PROGRAMS 
DBSRTBe 3-8 PHASE II PROGRAMS. 3-3 
DBSRTC PHASE III PROGRAMS. 3-7 
DBSRTC. 312 PHASE IV PROGRAMS. 3-9 
DESRTD PHASE V PROGRAMS. 3-13 
DBSRTD. 3-7 REC 
DBTRIP REC (SUFFIX) CARDS. 2-4 
DBTRIP. 3-6 RECORD 
DBUNLD RECORD TAPE FORMATS. C-1 
DBUNLD. 3-3 RECORD COUNT 
DESCRIPTIONS INPUT RECORD COUNT RFPORT. 4-2 
OBINIT FIELD NAMES AND DESCRIPTIONS. A-1 QUTPUT RFCORD COUNT RFPORT. 4=2 
DFSIGN RFPORT 
SYSTEM DESIGN. 1-1 CONTROL FIFLO RFPORT. 4-2 
EDT FILF SIZE CRITERIA REPORT. 4-2 
EDT CARDS. 2-8 INPUT RECORD COUNT REPORT. 4-2 
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